#!/usr/bin/tclsh

foreach a [array names env] {
	puts "=-===$env($a)"
	
}